home *** CD-ROM | disk | FTP | other *** search
/ SGI Freeware 2002 November / SGI Freeware 2002 November - Disc 1.iso / dist / fw_ddd.idb / usr / freeware / share / ddd-3.3.1 / vsllib / linebreak.vsl.z / linebreak.vsl
Text File  |  2001-10-09  |  2KB  |  44 lines
  1. // $Id: linebreak.vsl,v 1.2 2000/06/09 13:06:27 andreas Exp $
  2. // Redefine the `~' operator such that lines with > 72 characters are broken
  3.  
  4. // Copyright (C) 1993 Technische Universitaet Braunschweig, Germany.
  5. // Written by Andreas Zeller <zeller@gnu.org>.
  6. // 
  7. // This file is part of DDD.
  8. // 
  9. // DDD is free software; you can redistribute it and/or
  10. // modify it under the terms of the GNU General Public
  11. // License as published by the Free Software Foundation; either
  12. // version 2 of the License, or (at your option) any later version.
  13. // 
  14. // DDD is distributed in the hope that it will be useful,
  15. // but WITHOUT ANY WARRANTY; without even the implied warranty of
  16. // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  17. // See the GNU General Public License for more details.
  18. // 
  19. // You should have received a copy of the GNU General Public
  20. // License along with DDD -- see the file COPYING.
  21. // If not, write to the Free Software Foundation, Inc.,
  22. // 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  23. // 
  24. // DDD is the data display debugger.
  25. // For details, see the DDD World-Wide-Web page, 
  26. // `http://www.gnu.org/software/ddd/',
  27. // or send a mail to the DDD developers <ddd@gnu.org>.
  28.  
  29. #include "builtin.vsl"
  30.  
  31. linebreak_space = hspace(" " * 72);
  32.  
  33. old_talign(...) = (~)(...);
  34.  
  35. #pragma override (~)
  36.  
  37. (~)(a) = a;
  38. (~)(a, b) = if (hspace(old_talign(a, b)) < linebreak_space)
  39.     then old_talign(a, b) else a | b fi;
  40. (~)(a, b, ...) = (~)((~)(a, b), ...);
  41.  
  42. // clear local definitions
  43. #pragma undef old_talign, linebreak_space
  44.